home *** CD-ROM | disk | FTP | other *** search
/ Aminet 32 / Aminet 32 (1999)(Schatztruhe)[!][Aug 1999].iso / GoldED / Add-Ons / envMDT22 / Install < prev    next >
Text File  |  1999-07-06  |  3KB  |  129 lines
  1. ; $VER: 1.0 All rights reserved.
  2.  
  3. (delopts "oknodelete" "force" "askuser")
  4. (complete 0)
  5.  
  6. (if (exists "GOLDED:" (NOREQ))
  7.  
  8.     (
  9.         (set vernum (getversion "golded:golded"))
  10.  
  11.         (set ver (/ vernum 65536))
  12.         (set rev (- vernum (* ver 65536)))
  13.  
  14.         (set version (+ (* 10 ver) rev))
  15.  
  16.         (if (< version 47)
  17.  
  18.             (
  19.                 (message "\nSorry, GoldED 4.7.0 or better required")
  20.  
  21.                 (exit (quiet))
  22.             )
  23.         )
  24.  
  25.         (message (cat "\n"
  26.  
  27.             "                                            \n"
  28.             "MicroDot mode for GoldED 4                  \n"
  29.             "                                            \n"
  30.             "©1997 Dietmar Eilert                        \n"
  31.             "      All Rights Reserved.                  \n"
  32.             "                                            \n"
  33.             "      E-Mail: dietmar@tomate.tng.oche.de    \n"
  34.             "                                            \n"
  35.             "GoldED Release 4.7.0+ required.             \n"
  36.         ))
  37.  
  38.         (if (not (exists "golded:api"))
  39.  
  40.             (makedir "golded:api")
  41.         )
  42.  
  43.         (if (not (exists "golded:syntax"))
  44.  
  45.             (makedir "golded:syntax")
  46.         )
  47.  
  48.         (copylib
  49.  
  50.             (prompt "Install syntax parser ?")
  51.             (source "syntax/warpMail.parser")
  52.             (dest   "golded:syntax")
  53.             (confirm)
  54.             (help @copylib-help)
  55.         )
  56.  
  57.         (copylib
  58.  
  59.             (prompt "Install API client ?")
  60.             (source "api/signature.api")
  61.             (dest   "golded:api")
  62.             (confirm)
  63.             (help @copylib-help)
  64.         )
  65.  
  66.         ; install registry editor (if not yet installed)
  67.  
  68.         (if (not (exists "golded:tools"))
  69.  
  70.             (makedir "golded:tools")
  71.         )
  72.  
  73.         (if (not (exists "golded:tools/regedit"))
  74.  
  75.             (makedir "golded:tools/regedit")
  76.         )
  77.  
  78.         (copylib
  79.  
  80.             (prompt "Install registry editor ?")
  81.             (source "bin/regedit" )
  82.             (dest   "golded:tools/regedit")
  83.             (confirm)
  84.             (help @copylib-help)
  85.         )
  86.  
  87.         (if (= @language "deutsch")
  88.  
  89.             (set language 1)
  90.             (set language 0)
  91.         )
  92.  
  93.         (set language (askchoice
  94.  
  95.             (prompt "\nSelect context menu language\n")
  96.  
  97.             (help @askchoice-help)
  98.  
  99.             (choices
  100.  
  101.                 "  English"
  102.                 "  Deutsch"
  103.             )
  104.  
  105.             (default language)
  106.         ))
  107.  
  108.         ; update registry
  109.  
  110.         (working "Updating registry...")
  111.  
  112.         (if (= language 0)
  113.  
  114.             (run "golded:tools/regedit/regedit script=install.bat presets/e/microdot.mouse")
  115.             (run "golded:tools/regedit/regedit script=install.bat presets/d/microdot.mouse")
  116.         )
  117.     )
  118.  
  119.     (message (cat "\n"
  120.  
  121.         "Please install GoldED before attempting to\n"
  122.         "install this client.                      \n"
  123.     ))
  124. )
  125.  
  126. (exit (quiet))
  127.  
  128. (welcome)
  129.